home *** CD-ROM | disk | FTP | other *** search
/ Yellows - Privacy (Deluxe) / Akira Gomi Photographs - Yellows: Privacy (Deluxe) - Disc 1.iso / mono / med.dxr / 00026.ls < prev    next >
Encoding:
Text File  |  1996-07-06  |  488 b   |  26 lines
  1. on mouseDown
  2.   global columnnum, ctime
  3.   if columnnum > 1 then
  4.     leftcursorchange(1)
  5.     set columnnum to columnnum - 1
  6.     columnset(columnnum)
  7.     updateStage()
  8.   else
  9.     go("start")
  10.     initcursor()
  11.     cursor(-1)
  12.   end if
  13.   repeat while the stillDown
  14.     if columnnum > 1 then
  15.       leftcursorchange(1)
  16.       set columnnum to columnnum - 1
  17.       columnset(columnnum)
  18.       updateStage()
  19.       next repeat
  20.     end if
  21.     go("start")
  22.     initcursor()
  23.     cursor(-1)
  24.   end repeat
  25. end
  26.